home *** CD-ROM | disk | FTP | other *** search
/ CompuServe - Multimedia W…shop 1995 February/March / CompuServe Multimedia Workshop February-March 1995 (Metatec Corporation)(1994).iso / setup / ccd / browse.vwr (.txt) next >
Asymetrix ToolBook File  |  1995-03-06  |  43KB  |  662 lines
  1. wwwwwwp
  2. wwwwwwp
  3. wwwwwwwwwwwwwwwwwwwwwwwwww
  4. wwwwww
  5. wwwww
  6. wwwww
  7. wwwww
  8. wwwww
  9. wwwwwwwwwwwwwwwwwwwwwwwwwwww
  10. wwwwwwwwp
  11. wwwwwwwwp
  12. wwwwwwwwp
  13. wwwwwwwwp
  14. wwwwwwwwp
  15. wwwwwwwwp
  16. wwwwwwwwp
  17. wwwwwwwwp
  18. wwwwwwwwp
  19. wwwwwwwwp
  20. wwwwwwwwp
  21. wwwwwwwwp
  22. Browse Viewer
  23. Browse
  24. I:\_ccd\extras\browse.avi
  25. ykeyDownArrow
  26. wwwwwww
  27. wwwwwww
  28. T,QVy~
  29. System
  30. Arial
  31. BW Times
  32. Arial
  33. HxuJlxA
  34. Arial
  35. BW TIMES
  36. browseViewer
  37. CCD Browse
  38. Browse
  39. page "Browse Viewer"
  40. shortName
  41. Browse
  42. openWindow
  43. szBrowseClip
  44. center
  45. bBrowseInit
  46. bkBrowseViewer
  47. closeWindow
  48. ptLastBrowsePos
  49. moved
  50. openWindow
  51. K= shortName() && "Browse"
  52. closeWindow
  53. szBrowseClip
  54. 8bkBrowseViewer
  55. 4logical bBrowseInit
  56. mmIsOpen 
  57. clip 
  58.         mmClose 
  59. M --wait
  60. odefaultPosition = 
  61. moved
  62. 4point ptLastBrowsePos
  63. ncd256
  64. TBKMPT
  65. NautCD
  66. CDBSE&File
  67. &Open...    Ctrl+O
  68. &Save    Ctrl+S
  69. Save &As...
  70. saveas
  71. &Import...
  72. import
  73. &Export...
  74. export
  75. Print Set&up...
  76. printsetup
  77. &Print Pages...    Ctrl+P
  78. printpages
  79. Prin&t Report...
  80. printreport
  81. Send &Mail...
  82. sendmail
  83. &Run...
  84. E&xit    Alt+F4
  85. &Edit
  86. &Undo    Ctrl+Z
  87. Cu&t    Ctrl+X
  88. &Copy    Ctrl+C
  89. &Paste    Ctrl+V
  90. paste
  91. C&lear    Del
  92. clear
  93. Select &All    Shift+F9
  94. selectall
  95. Select Pa&ge    Shift+F12
  96. selectpage
  97. &Size to Page    F11
  98. sizetopage
  99. F&ind...    F5
  100. Re&place...
  101. replace
  102. Aut&hor    F3
  103. author
  104. &Text
  105. &Character...    F6
  106. character
  107. &Paragraph...    F7
  108. paragraph
  109. &Regular    Ctrl+Space
  110. regular
  111. &Bold    Ctrl+B
  112. &Italic    Ctrl+I
  113. italic
  114. &Underline    Ctrl+U
  115. underline
  116. Stri&keout    Ctrl+K
  117. strikeout
  118. Superscrip&t/Subscript
  119. superscriptSubscript
  120. &Normal Script
  121. normalscript
  122. Su&bscript    Ctrl+L
  123. subscript
  124. Su&perscript    Ctrl+Shift+L
  125. superscript
  126. &Show Hotwords    F9
  127. showhotwords
  128. &Page
  129. &Next    Alt+Right
  130. &Previous    Alt+Left
  131. previous
  132. &First    Alt+Up
  133. first
  134. &Last    Alt+Down
  135. &Back    Shift+F2
  136. &History...    Ctrl+F2
  137. history
  138. N&ew Page    Ctrl+N
  139. newpage
  140. &Help
  141. &Contents    F1
  142. contents
  143. Status &Bar    F12
  144. statusbar
  145. browseViewer
  146. browseViewer
  147. Browse Viewer
  148. Pause
  149. pauseBrowse
  150. buttonClick
  151. buttonClick
  152. pauseBrowse
  153. playBrowse
  154. buttonClick
  155. buttonClick
  156. playBrowse
  157. goToPage
  158. SfileExtension
  159. y6browseViewer
  160. szBrowseClip
  161. pauseBrowse
  162. dwBrowseMovieLength
  163. NegoToPage
  164. W(setBrowseBar
  165. playing
  166. buttonClick
  167. buttonClick
  168. gwBrowseTimer
  169. szBrowseClip
  170. dwBrowseMovieLength
  171. gwPos
  172. 8bkBrowseViewer
  173.  = browseViewer()
  174.     lockScreen 
  175. targetWindow = 
  176. mmStatus 
  177. clip 
  178. B = "playing"
  179. pauseBrowse 
  180.  = mmPosition 
  181. fileExtension(mmSource 
  182. ) = "AVI"
  183. goToPage 
  184. setBrowseBar
  185. Go to page
  186. slideBox
  187. slider
  188. rSide
  189. slideBar
  190. buttonClick
  191. buttonClick
  192. mousePosition 
  193. e> rSide(
  194. B"slideBar" 
  195. slideBar
  196. myEnabled
  197. StepBack
  198. +#,##
  199. szBrowseClip
  200. W(setBrowseBar
  201. bkBrowseViewer
  202. playing
  203. wBrowseTimer
  204. buttonClick
  205. szBrowseClip
  206. W(setBrowseBar
  207. bkBrowseViewer
  208. buttonStillDown
  209. buttonClick    
  210. szBrowseClip
  211. dwBrowseMovieLength
  212. 8bkBrowseViewer
  213. gwBrowseTimer
  214. dwCurPos
  215.      = mmPosition 
  216. clip 
  217. ( >= 1
  218.         mmStep 
  219. setBrowseBar 
  220. timerStop(
  221. mmStatus 
  222.  = "playing"
  223.         mmPause 
  224. B"Play"
  225.     -- *** Uncomment 
  226. code 
  227. disappears. (The mmShow 
  228. _*** --
  229.     -- *** was causing the entire desktop 
  230. flash.) *** --
  231. xmmVisible 
  232. stage "BrowseViewerStage"
  233.  >= 1
  234. H1 wait
  235. StepForward
  236. browseViewerStage
  237. goToPage
  238. buttonClick
  239. buttonClick
  240. B"goToPage"
  241. 42,42,2442,1842
  242. mediaBounds
  243. enterPage
  244. leavePage
  245. dwBrowseDelta,dwBrowseSeekTo,dwLastX
  246. szBrowseClip
  247. 4logical bBrowsePlaying
  248. gwBrowseTimer
  249. 8bkBrowseViewer
  250. timerStop(
  251. | = (mmStatus 
  252. clip 
  253. o = "
  254. B"play"
  255.  = mmPosition 
  256. wseMovieLength,dwBrowseTravel,
  257. b(rSide(
  258. lSide(
  259. B"stepback") - width(
  260. j(dwBrowseMovieLength, \
  261. b(0,((
  262. )) / 
  263.         mmSeek 
  264.  wait
  265. buttonClick
  266. szBrowseClip
  267. dwBrowseMovieLength
  268. 8bkBrowseViewer
  269. gwBrowseTimer
  270. dwCurPos
  271.      = mmPosition 
  272. clip 
  273.         mmStep 
  274. setBrowseBar 
  275. timerStop(
  276. mmStatus 
  277.  = "playing"
  278.         mmPause 
  279. B"Play"
  280.     -- *** Uncomment 
  281. code 
  282. disappears. (The mmShow 
  283. _*** --
  284.     -- *** was causing the entire desktop 
  285. flash.) *** --
  286. xmmVisible 
  287. stage "BrowseViewerStage"
  288. H1 wait
  289. playBrowse mediaLength
  290. szBrowseClip,szBrowseViewer,szSysInfo[]
  291. dwBrowseMovieLength
  292. gwBrowseTimer,
  293. ",wAppName,wShortName
  294. 4logical bBrowseInit,bFirstBrowse
  295. 4point ptBrowseMovieSize,ptLastBrowsePos
  296. 8bkBrowseViewer
  297. gwPageNum
  298. szBookName
  299. ~SysSuspend,bSysMediaSuspend
  300.     bSysSuspend = 
  301. % = sysMediaSuspend
  302.         -- *** If browse movie has already been opened 
  303. session, *** --
  304.         -- *** display the 
  305. %soon 
  306. %possible, but verify that *** --
  307.         -- *** 
  308. @same 
  309. opening 
  310. *** --
  311.  <> "0,0"
  312. initBrowseViewer 
  313. bookInfoByBookID(
  314. "No" && appName() && "Disc found 
  315. volume" && romDrive()
  316. closeBrowse 
  317. o= default
  318.             mmSource 
  319. clip 
  320. "Could 
  321. xinitialize 
  322.             -- *** Verify 
  323. Jone *** --
  324. mmVisualSize 
  325.             mmEndPoint 
  326.         bkStartup = 
  327. 8startupBookName()
  328. resourceList(icon,
  329. initBrowseSlider 
  330.         mmOpen 
  331.         mmBackgroundPalette 
  332. fileExtension(
  333. ) = "MOV"
  334.             mmSeek 
  335.             mmShow 
  336. stage "browseViewerStage"
  337. setBrowseBar 
  338. B"goToPage" 
  339.             mmPlay 
  340. { notify 
  341.  = timerStart("periodic",1000,250,
  342.         state 
  343. timerNotify
  344. dwBrowseTravel,
  345. ,dwBrowseStart
  346. dwCurPos,dwTraveled
  347. mmIsOpen 
  348. + = mmPosition 
  349. lSide 
  350. B"slidebar" 
  351. "    ) * 
  352. pauseBrowse
  353. timerStop(
  354.     mmPause 
  355.     -- *** removed 
  356.  *** --
  357.     ,dwBrowseInterval
  358. targetWindow <> 
  359.  >= 1
  360. mmStep 
  361. key = 
  362. ykeyDownArrow
  363.             -- *** This code 
  364. necessary 
  365. prevent 
  366. disappearing *** --
  367.             -- *** Unfortunately, 
  368. also causes 
  369. desktop 
  370. flash 2/27/95 DRL *** --
  371. xmmVisible 
  372. isOpen 
  373.         -- *** 
  374. closes 
  375. its closeWindow handler *** --
  376.         defaultPosition 
  377.             mmClose 
  378. mmNotify mediaRef,cmd,result
  379. {objStage
  380. pgBrowseViewer
  381.  = "successful") -- 
  382.  = "superceded")
  383. ) = "
  384.             -- *** Uncomment 
  385. disappears. (The 
  386. _*** --
  387.             -- *** was causing 
  388. entire 
  389. .) *** --
  390. cmd = 
  391. szViewer 
  392. ptSize
  393. kgndSize
  394. Zstack stStageBounds
  395. gwOffset
  396. szStage,szPageName
  397.   = 60
  398.   = "
  399. statusBar
  400.         ptBkgndSize = 
  401. mediaSize 
  402. Hheight(
  403. ") + 
  404.         -- SEE NOTE BELOW ABOUT objTop HANDLERS
  405. B"slideBar" 
  406. rSide(
  407. B"stepback" 
  408. B"stepforward" 
  409. (width(
  410. A) + 
  411. "slideBox" 
  412. ) - \
  413. ") + 
  414. B"stepForward") - 
  415.         parentWindow 
  416.  = "0,0"
  417. screenResolution()
  418.     -- *** 
  419. a persistent property 
  420. saved 
  421.     *** --
  422.     -- *** "
  423. gives 
  424. rather annoying 
  425. centering itself        *** --
  426.     -- *** 
  427. restored 
  428. a minimized 
  429. , so...
  430. *** --
  431.  / 16)
  432. "slider") - 
  433. newLSide
  434. -- N.B. 
  435. LIS AN O/S KEYWORD, HENCE 
  436. INSTEAD
  437. newTop
  438. newRSide
  439. newBot
  440. newWidth
  441. newHeight
  442. myPath
  443. szTemp
  444. * = "\"
  445. slideBo
  446. >06060
  447. +#,##
  448. dwBrowseSeekTo
  449. dwBrowseDelta
  450. szBrowseClip
  451. dwLastX
  452. bBrowsePlaying
  453. bkBrowseViewer
  454. Playing
  455. wBrowseTimer
  456. buttonDown
  457. +&,!>
  458. +&,!Y
  459. +&,!>
  460. +&,!Y
  461. +&,!Y
  462. +&,!Y
  463. dwBrowseTravel
  464. dwBrowseSeekTo
  465. dwBrowseDelta
  466. szBrowseClip
  467. dwLastX
  468. rSide
  469. dwBrowseMovieLength
  470. width
  471. bkBrowseViewer
  472. lSide
  473. stepback
  474. buttonStillDown
  475. +&,!"
  476. +#,##
  477. szBrowseClip
  478. dwBrowseMovieLength
  479. W(setBrowseBar
  480. bkBrowseViewer
  481. playing
  482. wBrowseTimer
  483. buttonClick
  484. +&,!"
  485. szBrowseClip
  486. dwBrowseMovieLength
  487. W(setBrowseBar
  488. bkBrowseViewer
  489. buttonStillDown
  490.     ,    W(
  491. &y61'
  492. .&+    +E
  493. w,    #?
  494. w,    #?
  495. ,%H.%
  496. wAppName
  497. browseViewerStage
  498. ptBrowseMovieSize
  499. W(setBrowseBar
  500. szBrowseViewer
  501. bkStartup
  502. SfileExtension
  503. startupBookName
  504. Could not initialize Browse Movie
  505. szSysInfo
  506. Browse Viewer
  507. goToPage
  508. qtromDrive
  509. szBrowseClip
  510. closeBrowse
  511. periodic
  512. BrowseViewer
  513. Disc found in volume
  514. dwBrowseMovieLength
  515. wBrowse
  516. bBrowseInit
  517. bFirstBrowse
  518. Browse
  519. bkBrowseViewer
  520. bookInfoByBookID
  521. wShortName
  522. default
  523.     1appName
  524. initBrowseViewer
  525. initBrowseSlider
  526. wBrowseTimer
  527. playBrowse
  528. +&,!Y
  529. +&,!Y
  530. lSide
  531. szBrowseClip
  532. dwBrowseStart
  533. dwBrowseMovieLength
  534. slidebar
  535. szBrowseViewer
  536. dwBrowseTravel
  537. timerNotify
  538. +&,!Y
  539. +&,!Y
  540. lSide
  541. szBrowseClip
  542. dwBrowseStart
  543. dwBrowseMovieLength
  544. slidebar
  545. szBrowseViewer
  546. dwBrowseTravel
  547. setBrowseBar
  548. +#,##
  549. szBrowseClip
  550. wBrowseTimer
  551. pauseBrowse
  552. +&,!"
  553. browseViewerStage
  554. szBrowseClip
  555. dwBrowseMovieLength
  556. W(setBrowseBar
  557. szBrowseViewer
  558. dwBrowseInterval
  559. keyDown
  560. +#,##
  561. szBrowseClip
  562. center
  563. bBrowseInit
  564. szBrowseViewer
  565. wBrowseTimer
  566. closeBrowse
  567. +#,##
  568. +#,##
  569. +#,##
  570. SfileExtension
  571. browseViewerStage
  572. szViewer
  573. wPageNum
  574. goToPage
  575. szBrowseClip
  576. center
  577. Browse Viewer
  578. successful
  579. mmPause
  580. bBrowseInit
  581. mmClose
  582. W(setBrowseBar
  583. szBrowseViewer
  584. mmPlay
  585. wBrowseTimer
  586. mmNotify
  587. <+U!!
  588. .&,    7
  589. .&,    7
  590. lSide
  591. browseViewerStage
  592. stepforward
  593. pause
  594. goToPage
  595. rSide
  596. Browse Viewer
  597. slideBox
  598. width
  599. objTop
  600. width
  601. screenResolution
  602. slideBar
  603. statusBar
  604. szBrowseViewer
  605. objTop
  606. height
  607. stepForward
  608. lSide
  609. ptLastBrowsePos
  610. stepback
  611. initBrowseViewer
  612. +&,!J
  613. rSide
  614. dwBrowseStart
  615. dwBrowseMovieLength
  616. slider
  617. width
  618. slideBar
  619. szBrowseViewer
  620. dwBrowseTravel
  621. dwBrowseInterval
  622. initBrowseSlider
  623. lSide
  624. lSide
  625. objTop
  626. objTop
  627. rSide
  628. width
  629. rSide
  630. height
  631. width
  632. width
  633. height
  634. height
  635. <+U!!
  636. statusBar
  637. enterBook
  638. myPath
  639. browseViewer
  640. GettingAround
  641. statusmsg
  642. statusMsg
  643. StatusText
  644. mouseEnter
  645. statusMsg
  646. mouseLeave
  647. buttonDown
  648. buttonUp
  649. t8dwMediaLength
  650. (stSize
  651. BlackMask
  652. UszMediaSource
  653. playMovie
  654. %.